home *** CD-ROM | disk | FTP | other *** search
- if(buff ne "")
- {
- dir = mbsubstring(buff,1,1);
- dX = Number(mbsubstring(buff,2,1));
- dY = Number(mbsubstring(buff,3,1));
- }
- buff = "";
- set("/:mcX",dX);
- set("/:mcY",dY);
- switch(dir)
- {
- case "L":
- setProperty("/mc", _X, eval("/:sX") + dX * eval("/:cW"));
- setProperty("/mc", _Y, eval("/:sY") + dY * eval("/:cW"));
- dX--;
- break;
- case "R":
- setProperty("/mc", _X, eval("/:sX") + dX * eval("/:cW"));
- setProperty("/mc", _Y, eval("/:sY") + dY * eval("/:cW"));
- dX++;
- break;
- case "U":
- setProperty("/mc", _X, eval("/:sX") + dX * eval("/:cW"));
- setProperty("/mc", _Y, eval("/:sY") + dY * eval("/:cW"));
- dY--;
- break;
- case "D":
- setProperty("/mc", _X, eval("/:sX") + dX * eval("/:cW"));
- setProperty("/mc", _Y, eval("/:sY") + dY * eval("/:cW"));
- dY++;
- }
- tFrame = getProperty("/m" add dX add dY, _currentframe);
- tellTarget("/m" add dX add dY)
- {
- gotoAndStop(3);
- if(eval("/moveMC/:tFrame") == 4)
- {
- tellTarget("/m" add eval("/moveMC/:dX") add eval("/moveMC/:dY") add "/keyMC")
- {
- nextFrame();
- }
- }
- else
- {
- tellTarget("/m" add eval("/moveMC/:dX") add eval("/moveMC/:dY") add "/keyMC")
- {
- prevFrame();
- }
- }
- }
- switch(dir)
- {
- case "L":
- dX--;
- break;
- case "R":
- dX++;
- break;
- case "U":
- dY--;
- break;
- case "D":
- dY++;
- }
- tellTarget("/m" add dX add dY)
- {
- if(_currentframe != 2)
- {
- if(tFrame != 4)
- {
- gotoAndStop(1);
- }
- else
- {
- gotoAndStop(4);
- }
- }
- }
-